#!/usr/bin/perl -w

use strict;


my ($argsCount) = @ARGV;
print("count: ". (@ARGV). "\n");
print("argsCount: $argsCount\n");

my $a1 = $ARGV[0];
my $a2 = $ARGV[1];
my $a3 = $ARGV[2];
my $a4 = $ARGV[3];
my $a5 = $ARGV[4];

print("a1:$a1\n");
print("a2:$a2\n");
print("a3:$a3\n");
print("a4:$a4\n");
print("a5:$a5\n");
